#include <cstddef>
#include<stdio.h>
#include<malloc.h>
typedef char ElemType;
typedef struct LNode 
{
	ElemType data;
	struct LNode *next; 
}LinkNode;

void CreatlistF(LinkNode *&L,ElemType a[],int n)
{
	LinkNode *s;
	L=(LinkNode*)malloc(sizeof(LinkNode));
	L->next=NULL;
	for(int i=0;i<n;i++)
	{
		s=(LinkNode*)malloc(sizeof(LinkNode));
		s->data=a[i];
		s->next=L->next;
		L->next=s; 
	}
}

void CreatlistR(LinkNode *&L,ElemType a[],int n)
{
	LinkNode *r,*s;
	L=(LinkNode *)malloc(sizeof(LinkNode));
	r=L;
	for(int i=0;i<n;i++)
	{
		s=(LinkNode *)malloc(sizeof(LinkNode));
		s->data=a[i];
		r->next=s;
		r=s;
	}
	r->next=NULL;
}

void InitList(LinkNode *&L)
{
	L=(LinkNode*)malloc(sizeof(LinkNode));
	L->next=NULL; 
}

void Destroylist(LinkNode *&L)
{
    LinkNode *pre=L,*p=L->next;
    while(p!=NULL)
    {
        free(pre);
        pre=p;
        p=pre->next;
    }
    free(pre);
}

bool ListEmpty(LinkNode *L)
{
    return(L->next==NULL);
}

int ListLenght(LinkNode *L)
{
    int n=0;
    LinkNode *p=L;
    while(p->next!=NULL)
    {
        n++;
        p=p->next;
    }
    return(n);
}

void Output(LinkNode *L)
{
    LinkNode *p=L->next;
    while(p!=NULL)
    {
        printf("%d",p->data);
		p=p->next;
    }
	printf("\n");
}

bool GetElem(LinkNode *L,int i,ElemType &e)
{
	int j=0;
	LinkNode *p=L;
	if(i<=0)return false;
	while(j<i && p!=NULL)
	{
		j++;
		p=p->next;
	}
	if(p==NULL)
		return false;
	else
	{
		e=p->data;
		return true;
	}
}

int LocateElem(LinkNode *L,ElemType e)
{
	int i=1;
	LinkNode *p=L->next;
	while(p!=NULL && p->data!=e)
	{
		p=p->next;
		i++;
	}
	if(p==NULL)
		return 0;
	else
	 return (i);
}

bool Listinsert(LinkNode *&L,int i,ElemType e)
{
	int j=0;
	LinkNode *p=L,*s;
	if(i<=0)return false;
	while(j<i-1 && p!=NULL)
	{
		j++;
		p=p->next;
	}
	if(p==NULL)
		return false;
	else
	{
		s=(LinkNode * )malloc(sizeof(LinkNode));
		s->data=e;
		s->next=p->next;
		p->next=s;
		return true;
	}
}

bool ListDelet(LinkNode *&L,int i,ElemType e)
{
	int j=0;
	LinkNode *p=L,*q;
	if(j<=i-1&&p!=NULL)
	{
		j++;
		q=p->next;
	}
	if(p==NULL)
		return false;
	else
	 {
		 q=p->next;
		 if(q==NULL)
		 	return false;
		e=q->data;
		p->next=q->next;
		free(q);
		return true;
	 }
}


int main()
{
	LinkNode *h;
	ElemType e;
	printf("单链表的基本运算如下：\n");
	printf("(1)初始化链表和\n");
	InitList(h);
	printf("（2）依次采用尾插法插入元素a,b,c,d,e\n");
	Listinsert(h,1, 'a');
	Listinsert(h,2, 'b');
	Listinsert(h,3, 'c');
	Listinsert(h,4, 'd');
	Listinsert(h,5, 'e');
	printf("（3）输出单链表h:");Output(h);
	printf("（4）单链表h的长度：%d\n"),ListLenght(h);
	printf("（5）单链表h为：%s\n",(ListEmpty(h)?"空":"非空"));
	GetElem(h,3,e);
	printf("(6)单链表h的第3个元素：%c\n",e);
	printf("（7）元素a的位置:%d\n",LocateElem(h,'a'));
	printf("（8）在第4个元素位置上插入元素f\n");
	Listinsert(h, 4, 'f');
	printf("（9）输出单链表h:");Output(h);
	printf("(10)删除h的第3个元素f\n");
	ListDelet(h, 3, e);
	printf("(11)输出单链表h：");Output(h);
	printf("（12）释放单链表h\n");
	Destroylist(h);
	return 0;
}